(pcomplete-time-less-p): Remove.

diff --git a/lisp/pcomplete.el b/lisp/pcomplete.el
index 42f4c23add1a17ac0ce2467ffe0ceddc01afb92f..1260867f7c6b92e654446e71e9496a059663e250 100644 (file)
--- a/lisp/pcomplete.el
+++ b/lisp/pcomplete.el
@@ -1147,12 +1147,6 @@ If specific documentation can't be given, be generic."
 
 ;; general utilities
 
-(defsubst pcomplete-time-less-p (t1 t2)
-  "Say whether time T1 is less than time T2."
-  (or (< (car t1) (car t2))
-      (and (= (car t1) (car t2))
-          (< (nth 1 t1) (nth 1 t2)))))
-
 (defun pcomplete-pare-list (l r &optional pred)
   "Destructively remove from list L all elements matching any in list R.
 Test is done using `equal'.